home *** CD-ROM | disk | FTP | other *** search
- /*****************************************************************
- * uunet2fbm.c: FBM Release 1.0 25-Feb-90 Michael Mauldin
- *
- * uunet2fbm.c: convert a bitmap to Targa format
- *
- * USAGE
- * % uunet2fbm [ image ] > image.fbm
- *
- * HISTORY
- * 05-July-89 Dan Sahlin (dan@sics.se) at SICS
- * Created from a copy of pic2fbm
- *****************************************************************/
-
- # include <stdio.h>
- # include <math.h>
- # include "fbm.h"
-
- # define USAGE\
- "Usage: uunet2fbm [ image ] > image.fbm"
-
- #ifndef lint
- static char *fbmid =
- "$FBM uunet2fbm.c <1.0> written by Dan Sahlin, source code available \
- free from MLM@CS.CMU.EDU and from UUNET archives$";
- #endif
- main(argc,argv)
- int argc; char *argv[];
- { FBM image;
-
- /* Clear pointers */
- image.cm = image.bm = (unsigned char *) NULL;
-
- /* Open input if given */
- if (argc > 1)
- { if (freopen (argv[1], "r", stdin) != stdin)
- { perror (argv[1]);
- exit(1);
- }
- }
-
- if (read_uunet (&image, stdin, "", 0) &&
- write_fbm (&image, stdout))
- { exit(0); }
- else
- { exit (1); }
- }
-